﻿Namespace AboutDNN.DNNMVC

    Public Class ModelError
        Public PropertyName As String
        Public Message As String
        Public Data As Exception

        Public Sub New(ByVal propName As String, ByVal msg As String)
            PropertyName = propName
            Message = msg
        End Sub

        Public Sub New(ByVal propName As String, ByVal msg As String, ByVal referencedException As Exception)
            PropertyName = propName
            Message = msg
            Data = referencedException
        End Sub
    End Class

End Namespace
